﻿Imports System.Xml

Public Class TextWrapOffset

	Property Top As Double

	Property Bottom As Double

	Property Left As Double

	Property Right As Double

	Public Shared Function ReadXml(reader As XmlReader) As TextWrapOffset
		Dim two As New TextWrapOffset()

		If reader.HasAttributes Then
			two.Top = Parser.ParseDouble(reader.GetAttribute("Top"))
			two.Bottom = Parser.ParseDouble(reader.GetAttribute("Bottom"))
			two.Left = Parser.ParseDouble(reader.GetAttribute("Left"))
			two.Right = Parser.ParseDouble(reader.GetAttribute("Right"))
		End If

		Return two
	End Function
End Class
